object MainFRM: TMainFRM
  Left = 188
  Top = 162
  Width = 932
  Height = 656
  Caption = 'HITDelivery 1.0.1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = mnuMain
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object JvLabel12: TJvLabel
    Left = 734
    Top = 74
    Width = 52
    Height = 13
    Caption = 'Pay Terms'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    HotTrackFont.Charset = ANSI_CHARSET
    HotTrackFont.Color = clWindowText
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'Tahoma'
    HotTrackFont.Style = []
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 591
    Width = 924
    Height = 19
    Panels = <>
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 924
    Height = 177
    Align = alTop
    TabOrder = 1
    object JvLabel1: TJvLabel
      Left = 24
      Top = 16
      Width = 98
      Height = 13
      Caption = 'Sales &Order Number'
      FocusControl = edtOrdNr
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object JvLabel2: TJvLabel
      Left = 436
      Top = 16
      Width = 24
      Height = 13
      Caption = 'User'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object btnSearch: TJvNavPanelButton
      Left = 272
      Top = 13
      Width = 86
      Height = 21
      Caption = '&Search Order'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = [fsBold]
      ParentFont = False
      ImageIndex = 0
      OnClick = btnSearchClick
    end
    object JvLabel4: TJvLabel
      Left = 494
      Top = 98
      Width = 52
      Height = 13
      Caption = 'Pay Terms'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object JvLabel5: TJvLabel
      Left = 494
      Top = 122
      Width = 52
      Height = 13
      Caption = 'Forwarder'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object JvLabel6: TJvLabel
      Left = 494
      Top = 146
      Width = 57
      Height = 13
      Caption = 'Deliv Terms'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object JvLabel7: TJvLabel
      Left = 6
      Top = 50
      Width = 37
      Height = 13
      Caption = 'Invoice'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object JvLabel8: TJvLabel
      Left = 246
      Top = 50
      Width = 41
      Height = 13
      Caption = 'Delivery'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object JvLabel9: TJvLabel
      Left = 734
      Top = 122
      Width = 62
      Height = 13
      Caption = 'Ord No Deliv'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object JvLabel10: TJvLabel
      Left = 734
      Top = 98
      Width = 39
      Height = 13
      Caption = 'Balance'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object JvLabel11: TJvLabel
      Left = 734
      Top = 146
      Width = 60
      Height = 13
      Caption = 'Deliv No Inv'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object JvLabel13: TJvLabel
      Left = 734
      Top = 74
      Width = 55
      Height = 13
      Caption = 'Credit Limit'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object edtOrdNr: TJvEdit
      Left = 128
      Top = 13
      Width = 124
      Height = 19
      Hint = 'Please enter Sales order number'
      Flat = True
      ParentFlat = False
      Modified = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
    end
    object edtUser: TJvEdit
      Left = 467
      Top = 13
      Width = 190
      Height = 19
      Flat = True
      ParentFlat = False
      Modified = False
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object edtCustInv: TJvEdit
      Left = 47
      Top = 47
      Width = 161
      Height = 19
      Flat = True
      ParentFlat = False
      Modified = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
    end
    object memoAddrInv: TJvMemo
      Left = 47
      Top = 74
      Width = 185
      Height = 88
      AutoSize = False
      MaxLines = 0
      HideCaret = False
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFlat = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
    end
    object memoAddrDel: TJvMemo
      Left = 288
      Top = 74
      Width = 185
      Height = 88
      AutoSize = False
      MaxLines = 0
      HideCaret = False
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFlat = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 4
    end
    object edtCustDel: TJvEdit
      Left = 289
      Top = 48
      Width = 161
      Height = 19
      Flat = True
      ParentFlat = False
      Modified = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 5
    end
    object edtPayTerms: TJvEdit
      Left = 559
      Top = 95
      Width = 162
      Height = 19
      Flat = True
      ParentFlat = False
      Modified = False
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
    end
    object edtForwarder: TJvEdit
      Left = 559
      Top = 119
      Width = 162
      Height = 19
      Flat = True
      ParentFlat = False
      Modified = False
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
    end
    object edtDelTerms: TJvEdit
      Left = 559
      Top = 143
      Width = 162
      Height = 19
      Flat = True
      ParentFlat = False
      Modified = False
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 8
    end
    object JvClock1: TJvClock
      Left = 672
      Top = 11
      Width = 81
      Height = 25
      DateFormat = 'dd/MM/yyyy'
    end
    object lblWarning: TJvgFlyingText
      Left = 488
      Top = 46
      Width = 241
      Height = 43
      Transparent = True
      Gradient.FromColor = clRed
      Gradient.ToColor = clGreen
      Gradient.Active = True
      Gradient.Orientation = fgdHorizontal
      Gradient3D.FromColor = clBlack
      Gradient3D.ToColor = clRed
      Gradient3D.Depth = 1
      ScalePercent = 99
      StepScaleFactor = 1.100000023841858000
      ResultFont.Charset = ANSI_CHARSET
      ResultFont.Color = clWhite
      ResultFont.Height = -27
      ResultFont.Name = 'Tahoma'
      ResultFont.Style = [fsBold]
      TimerInterval = 15
      Text.Strings = (
        'Customer Locked')
      Visible = False
      StepShift.X = 0
      StepShift.Y = 0
    end
    object edtOrdNotDelivered: TJvEdit
      Left = 799
      Top = 119
      Width = 108
      Height = 19
      Flat = True
      ParentFlat = False
      Alignment = taRightJustify
      Modified = False
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 11
    end
    object edtBalance: TJvEdit
      Left = 799
      Top = 95
      Width = 108
      Height = 19
      Flat = True
      ParentFlat = False
      Alignment = taRightJustify
      Modified = False
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 12
    end
    object edtDelivNotInvoiced: TJvEdit
      Left = 799
      Top = 143
      Width = 108
      Height = 19
      Flat = True
      ParentFlat = False
      Alignment = taRightJustify
      Modified = False
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 13
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 177
    Width = 924
    Height = 311
    Align = alClient
    TabOrder = 2
    object grdMain: TJvDBUltimGrid
      Left = 1
      Top = 1
      Width = 922
      Height = 309
      Align = alClient
      DataSource = dsRow
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
      ParentFont = False
      PopupMenu = mnuPopGrid
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      MultiSelect = True
      AlternateRowColor = clMoneyGreen
      SelectColumnsDialogStrings.Caption = 'Select columns'
      SelectColumnsDialogStrings.OK = '&OK'
      SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
      EditControls = <>
      RowsHeight = 17
      TitleRowHeight = 17
      Columns = <
        item
          Expanded = False
          FieldName = 'tblPos'
          ReadOnly = True
          Title.Caption = 'Pos'
          Width = 59
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'tblArt'
          ReadOnly = True
          Title.Caption = 'Articolo'
          Width = 101
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'tblDesArt'
          ReadOnly = True
          Title.Caption = 'Descrizione'
          Width = 165
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'tblQtaRes'
          ReadOnly = True
          Title.Caption = 'Qta Residua'
          Width = 73
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'tblQtaSped'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          Title.Caption = 'Qta Da Spedire'
          Width = 82
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'tblMag'
          ReadOnly = True
          Title.Caption = 'Mag'
          Width = 56
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'tblGiacMag'
          ReadOnly = True
          Title.Caption = 'Giacenza'
          Width = 65
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'tblUbicazione'
          ReadOnly = True
          Title.Caption = 'Ubicazione'
          Width = 93
          Visible = True
        end>
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 488
    Width = 924
    Height = 103
    Align = alBottom
    TabOrder = 3
    object JvLabel3: TJvLabel
      Left = 9
      Top = 5
      Width = 55
      Height = 13
      Caption = 'Note x Mail'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = []
    end
    object btnMail: TJvNavPanelButton
      Left = 836
      Top = 57
      Width = 69
      Height = 39
      Caption = ' Send &Mail'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = [fsBold]
      ParentFont = False
      ImageIndex = 0
      OnClick = btnMailClick
    end
    object btnPreview: TJvNavPanelButton
      Left = 836
      Top = 8
      Width = 69
      Height = 25
      Caption = '   &Preview'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'Tahoma'
      HotTrackFont.Style = [fsBold]
      ParentFont = False
      ImageIndex = 0
      OnClick = btnPreviewClick
    end
    object memoNote: TJvMemo
      Left = 69
      Top = 5
      Width = 748
      Height = 92
      AutoSize = False
      MaxLines = 0
      HideCaret = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
  end
  object edtCredLimit: TJvEdit
    Left = 799
    Top = 71
    Width = 108
    Height = 19
    Flat = True
    ParentFlat = False
    Alignment = taRightJustify
    Modified = False
    Enabled = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
  end
  object mnuMain: TMainMenu
    Left = 256
    Top = 136
    object mnuFile: TMenuItem
      Caption = '&File'
      object mnuQuit: TMenuItem
        Caption = '&Quit'
      end
    end
  end
  object SMTP: TIdSMTP
    MaxLineAction = maException
    ReadTimeout = 0
    Host = 'de01smtp01'
    Port = 25
    AuthenticationType = atNone
    Left = 256
    Top = 88
  end
  object tblMain: TkbmMemTable
    Active = True
    DesignActivation = True
    AttachedAutoRefresh = True
    AttachMaxCount = 1
    FieldDefs = <
      item
        Name = 'tblOrdNR'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'tblCustInvCode'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'tblCustInvAddr'
        DataType = ftMemo
      end
      item
        Name = 'tblCustDelCode'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'tblCustDelAddr'
        DataType = ftMemo
      end
      item
        Name = 'tblPayTerms'
        DataType = ftString
        Size = 35
      end
      item
        Name = 'tblDelTerms'
        DataType = ftString
        Size = 35
      end
      item
        Name = 'tblForwarder'
        DataType = ftString
        Size = 35
      end
      item
        Name = 'tblPos'
        DataType = ftInteger
      end
      item
        Name = 'tblArt'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'tblDesArt'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'tblQtaRes'
        DataType = ftFloat
      end
      item
        Name = 'tblQtaSped'
        DataType = ftFloat
      end
      item
        Name = 'tblMag'
        DataType = ftString
        Size = 8
      end
      item
        Name = 'tblGiacMag'
        DataType = ftFloat
      end
      item
        Name = 'tblUbicazione'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'tblNote'
        DataType = ftMemo
      end
      item
        Name = 'tblUser'
        DataType = ftString
        Size = 40
      end
      item
        Name = 'tblLockedCust'
        DataType = ftString
        Size = 20
      end>
    IndexFieldNames = 'tblPos'
    IndexName = 'tblMainIndex1'
    IndexDefs = <
      item
        Name = 'tblMainIndex1'
        Fields = 'tblPos'
      end>
    SortOptions = []
    PersistentBackup = False
    ProgressFlags = [mtpcLoad, mtpcSave, mtpcCopy]
    LoadedCompletely = False
    SavedCompletely = False
    FilterOptions = []
    Version = '5.52'
    LanguageID = 0
    SortID = 0
    SubLanguageID = 1
    LocaleID = 1024
    Left = 200
    Top = 344
    object tblMaintblOrdNR: TStringField
      DisplayWidth = 2
      FieldName = 'tblOrdNR'
      Size = 15
    end
    object tblMaintblCustInvCode: TStringField
      DisplayWidth = 2
      FieldName = 'tblCustInvCode'
      Size = 15
    end
    object tblMaintblCustInvAddr: TMemoField
      DisplayWidth = 1
      FieldName = 'tblCustInvAddr'
      BlobType = ftMemo
    end
    object tblMaintblCustDelCode: TStringField
      DisplayWidth = 2
      FieldName = 'tblCustDelCode'
      Size = 15
    end
    object tblMaintblCustDelAddr: TMemoField
      DisplayWidth = 1
      FieldName = 'tblCustDelAddr'
      BlobType = ftMemo
    end
    object tblMaintblPayTerms: TStringField
      DisplayWidth = 5
      FieldName = 'tblPayTerms'
      Size = 35
    end
    object tblMaintblDelTerms: TStringField
      DisplayWidth = 5
      FieldName = 'tblDelTerms'
      Size = 35
    end
    object tblMaintblForwarder: TStringField
      DisplayWidth = 5
      FieldName = 'tblForwarder'
      Size = 35
    end
    object tblMaintblPos: TIntegerField
      DisplayWidth = 1
      FieldName = 'tblPos'
    end
    object tblMaintblArt: TStringField
      DisplayWidth = 2
      FieldName = 'tblArt'
      Size = 15
    end
    object tblMaintblDesArt: TStringField
      DisplayWidth = 8
      FieldName = 'tblDesArt'
      Size = 50
    end
    object tblMaintblQtaRes: TFloatField
      DisplayWidth = 1
      FieldName = 'tblQtaRes'
    end
    object tblMaintblQtaSped: TFloatField
      DisplayWidth = 1
      FieldName = 'tblQtaSped'
    end
    object tblMaintblMag: TStringField
      DisplayWidth = 1
      FieldName = 'tblMag'
      Size = 8
    end
    object tblMaintblGiacMag: TFloatField
      DisplayWidth = 1
      FieldName = 'tblGiacMag'
    end
    object tblMaintblUbicazione: TStringField
      DisplayWidth = 2
      FieldName = 'tblUbicazione'
      Size = 30
    end
    object tblMaintblNote: TMemoField
      DisplayWidth = 1
      FieldName = 'tblNote'
      BlobType = ftMemo
    end
    object tblMaintblUser: TStringField
      FieldName = 'tblUser'
      Size = 40
    end
    object tblMaintblLockedCust: TStringField
      FieldName = 'tblLockedCust'
    end
  end
  object dsRow: TJvDataSource
    DataSet = tblMain
    Left = 256
    Top = 344
  end
  object cniScala: TADOConnection
    LoginPrompt = False
    Left = 504
    Top = 328
  end
  object cnStockLocation: TADOConnection
    LoginPrompt = False
    Left = 504
    Top = 384
  end
  object qryScala: TADOQuery
    Connection = cniScala
    Parameters = <>
    Left = 576
    Top = 328
  end
  object qryLocation: TADOQuery
    Connection = cnStockLocation
    Parameters = <>
    Left = 576
    Top = 384
  end
  object mnuPopGrid: TPopupMenu
    Left = 88
    Top = 264
    object mnuTransWH: TMenuItem
      Caption = 'Transactions WH'
      OnClick = mnuTransWHClick
    end
    object mnuTransALL: TMenuItem
      Caption = 'Transactions ALL'
      OnClick = mnuTransALLClick
    end
    object mnuFlussoWH: TMenuItem
      Caption = 'Flusso WH'
      OnClick = mnuFlussoWHClick
    end
    object mnuFlussoALL: TMenuItem
      Caption = 'Flusso ALL'
      OnClick = mnuFlussoALLClick
    end
  end
  object rtpAlias: TRpAlias
    List = <
      item
        Alias = 'TBLMAIN'
        Dataset = tblMain
      end>
    Connections = <>
    Left = 360
    Top = 289
  end
  object rptEngine: TVCLReport
    Filename = 'G:\EDP\Source\Delphi\HITDelivery\repPickList.rep'
    AsyncExecution = True
    Title = 'Picking List'
    AliasList = rtpAlias
    Left = 360
    Top = 353
  end
end
